home *** CD-ROM | disk | FTP | other *** search
- object FrmIndex: TFrmIndex
- Left = 328
- Top = 468
- BorderIcons = []
- BorderStyle = bsNone
- Caption = 'Message Index'
- ClientHeight = 260
- ClientWidth = 530
- Color = clBtnFace
- UseDockManager = True
- DragKind = dkDock
- DragMode = dmAutomatic
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = False
- Scaled = False
- OnActivate = FormActivate
- OnClose = FormClose
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- PixelsPerInch = 120
- TextHeight = 16
- object MsgIndexPanel: TPanel
- Left = 0
- Top = 0
- Width = 530
- Height = 260
- Align = alClient
- BevelInner = bvRaised
- BevelOuter = bvLowered
- TabOrder = 0
- object Bevel2: TBevel
- Left = 2
- Top = 19
- Width = 526
- Height = 3
- Align = alTop
- Shape = bsTopLine
- end
- object MsgIndexTitlePanel: TPanel
- Left = 2
- Top = 2
- Width = 526
- Height = 17
- Cursor = crHandPoint
- Align = alTop
- BevelOuter = bvNone
- Color = 8388681
- TabOrder = 0
- OnClick = MsgIndexTitlePanelClick
- OnMouseMove = MsgIndexTitlePanelMouseMove
- object LblName: TLabel
- Left = 54
- Top = 1
- Width = 86
- Height = 15
- Caption = 'Message Index'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWhite
- Font.Height = 15
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- OnClick = MsgIndexTitlePanelClick
- end
- object LblMailbox: TLabel
- Left = 4
- Top = 1
- Width = 47
- Height = 15
- Caption = 'Mailbox:'
- Color = clSilver
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clYellow
- Font.Height = 15
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentColor = False
- ParentFont = False
- Transparent = True
- OnClick = MsgIndexTitlePanelClick
- end
- object Panel1: TPanel
- Left = 156
- Top = 0
- Width = 370
- Height = 17
- Align = alRight
- BevelOuter = bvNone
- ParentColor = True
- TabOrder = 0
- object LblShowOnly: TLabel
- Left = 4
- Top = 1
- Width = 31
- Height = 15
- Caption = 'Show'
- Color = clSilver
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clSilver
- Font.Height = 15
- Font.Name = 'Arial'
- Font.Style = []
- ParentColor = False
- ParentFont = False
- Transparent = True
- OnClick = MsgIndexTitlePanelClick
- end
- object LblContain: TLabel
- Left = 132
- Top = 1
- Width = 57
- Height = 15
- Caption = 'containing'
- Color = clSilver
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clSilver
- Font.Height = 15
- Font.Name = 'Arial'
- Font.Style = []
- ParentColor = False
- ParentFont = False
- Transparent = True
- OnClick = MsgIndexTitlePanelClick
- end
- object BtnShowOnly: TSpeedButton
- Left = 269
- Top = 0
- Width = 24
- Height = 17
- Cursor = crHandPoint
- Caption = 'Go!'
- Flat = True
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWhite
- Font.Height = 14
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- OnClick = BtnShowOnlyClick
- end
- object EditContain: TEdit
- Left = 194
- Top = 1
- Width = 75
- Height = 16
- BorderStyle = bsNone
- Enabled = False
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWhite
- Font.Height = 15
- Font.Name = 'Arial'
- Font.Style = []
- ParentColor = True
- ParentFont = False
- TabOrder = 1
- OnChange = EditContainChange
- OnExit = EditContainExit
- OnKeyPress = EditContainKeyPress
- end
- object cbHide: TCheckBox
- Left = 297
- Top = 1
- Width = 78
- Height = 17
- Caption = 'Hide rest'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWhite
- Font.Height = 15
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- TabOrder = 2
- OnClick = BtnShowOnlyClick
- end
- object cbShowOnly: TEnhComboBox
- Left = 38
- Top = -2
- Width = 90
- Height = 21
- Style = csDropDownList
- AutoDropDownWidth = True
- Color = clBlack
- Ctl3D = False
- DropDownCount = 16
- DropDownWidth = 145
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWhite
- Font.Height = 13
- Font.Name = 'Arial'
- Font.Style = []
- ItemHeight = 13
- Items.Strings = (
- 'everything'
- 'subject'
- 'from'
- 'date'
- 'size'
- 'to'
- 'priority'
- 'unread'
- 'read'
- 'with attached'
- 'without attached')
- HorizontalExtent = 0
- ParentCtl3D = False
- ParentFont = False
- TabOrder = 0
- OnChange = cbShowOnlyChange
- end
- end
- end
- object IndexList: TListView
- Left = 2
- Top = 22
- Width = 526
- Height = 236
- Align = alClient
- Columns = <
- item
- Caption = 'Subject'
- Width = 140
- end
- item
- Caption = 'From'
- Width = 90
- end
- item
- Caption = 'Date'
- Width = 80
- end
- item
- Caption = 'Size'
- end
- item
- Caption = 'To'
- Width = 100
- end
- item
- Caption = 'Priority'
- Width = 60
- end>
- DragMode = dmAutomatic
- HideSelection = False
- HotTrackStyles = []
- MultiSelect = True
- OwnerData = True
- ReadOnly = True
- RowSelect = True
- PopupMenu = PopupMessage
- SmallImages = MsgIndexIcons_S
- SortType = stData
- TabOrder = 1
- ViewStyle = vsReport
- OnChange = IndexListChange
- OnClick = IndexListClick
- OnColumnClick = IndexListColumnClick
- OnCustomDraw = IndexListCustomDraw
- OnCustomDrawItem = IndexListCustomDrawItem
- OnCustomDrawSubItem = IndexListCustomDrawSubItem
- OnData = IndexListData
- OnDataFind = IndexListDataFind
- OnDblClick = IndexListDblClick
- OnDragDrop = IndexListDragDrop
- OnDragOver = IndexListDragOver
- OnKeyUp = IndexListKeyUp
- OnStartDrag = IndexListStartDrag
- end
- end
- object MsgIndexIcons_S: TImageList
- Left = 107
- Top = 62
- end
- object PopupMessage: TPopupMenu
- OnPopup = PopupMessagePopup
- Left = 143
- Top = 62
- object ShowOnly1: TMenuItem
- Caption = '&Show Only'
- object MenuDisplay1: TMenuItem
- Caption = 'Messages with similar SUBJECT'
- OnClick = MenuDisplay1Click
- end
- object MenuDisplay2: TMenuItem
- Caption = 'Messages FROM same sender'
- OnClick = MenuDisplay1Click
- end
- object N3: TMenuItem
- Caption = '-'
- end
- object MenuDisplay3: TMenuItem
- Caption = 'Messages sent on same DATE'
- OnClick = MenuDisplay1Click
- end
- object MenuDisplay5: TMenuItem
- Caption = 'Messages sent TO same address'
- OnClick = MenuDisplay1Click
- end
- object MenuDisplay6: TMenuItem
- Caption = 'Messages with same PRIORITY'
- OnClick = MenuDisplay1Click
- end
- object N5: TMenuItem
- Caption = '-'
- end
- object MenuDisplay7: TMenuItem
- Caption = 'All unread messages'
- OnClick = MenuDisplay1Click
- end
- object MenuDisplay8: TMenuItem
- Caption = 'All messages with attachment'
- OnClick = MenuDisplay1Click
- end
- end
- object N4: TMenuItem
- Caption = '-'
- end
- object TagMessage1: TMenuItem
- Caption = 'Tag M&essage'
- ShortCut = 16468
- OnClick = TagMessage1Click
- end
- object UntagMessage1: TMenuItem
- Caption = 'Untag Message'
- ShortCut = 16469
- OnClick = UntagMessage1Click
- end
- object ClearAllTags1: TMenuItem
- Caption = 'U&ntag All Messages'
- OnClick = ClearAllTags1Click
- end
- object N6: TMenuItem
- Caption = '-'
- end
- object SelectTaggedMessages1: TMenuItem
- Caption = 'Select &Tagged'
- ShortCut = 49236
- OnClick = SelectTaggedMessages1Click
- end
- object MarkasUnread1: TMenuItem
- Caption = 'Mark as &Unread'
- ShortCut = 16603
- OnClick = MarkasUnread1Click
- end
- object MarkasRead1: TMenuItem
- Caption = 'Mark as &Read'
- ShortCut = 16605
- OnClick = MarkasRead1Click
- end
- object InvertSelection1: TMenuItem
- Caption = '&Invert Selection'
- OnClick = InvertSelection1Click
- end
- object SelectAll1: TMenuItem
- Caption = 'Select &All'
- ShortCut = 16449
- OnClick = SelectAll1Click
- end
- object N12: TMenuItem
- Caption = '-'
- end
- object DeleteMessage1: TMenuItem
- Caption = '&Delete Message'
- ShortCut = 46
- OnClick = DeleteMessage1Click
- end
- object JunkMail1: TMenuItem
- Caption = '&Junk Mail - In the Future...'
- object MenuJunk1: TMenuItem
- Caption = 'Trash messages with similar SUBJECT'
- OnClick = MenuJunk1Click
- end
- object MenuJunk2: TMenuItem
- Caption = 'Trash messages FROM same sender'
- OnClick = MenuJunk1Click
- end
- end
- object N1: TMenuItem
- Caption = '-'
- end
- object Message1: TMenuItem
- Caption = '&Message'
- object New1: TMenuItem
- Caption = '&New'
- ShortCut = 16462
- OnClick = New1Click
- end
- object Reply2: TMenuItem
- Caption = '&Reply'
- ShortCut = 16466
- OnClick = Reply2Click
- end
- object ReplytoAll2: TMenuItem
- Caption = 'Reply to A&ll'
- end
- object Forward2: TMenuItem
- Caption = '&Forward'
- ShortCut = 16471
- OnClick = Forward2Click
- end
- object Bounce1: TMenuItem
- Caption = '&Bounce'
- ShortCut = 16450
- OnClick = Bounce1Click
- end
- object N7: TMenuItem
- Caption = '-'
- end
- object Copy1: TMenuItem
- Caption = '&Copy Message'
- ShortCut = 16451
- OnClick = Copy1Click
- end
- object N8: TMenuItem
- Caption = '-'
- end
- object ResetMessageStatusIcon1: TMenuItem
- Caption = 'Reset Status &Icon'
- OnClick = ResetMessageStatusIcon1Click
- end
- end
- object N2: TMenuItem
- Caption = '-'
- end
- object DisplayPreferences1: TMenuItem
- Caption = 'Display &Preferences'
- object ColumnShadingOptions1: TMenuItem
- Caption = 'Colu&mn Shading Options...'
- OnClick = ColumnShadingOptions1Click
- end
- object Changedisplayfont1: TMenuItem
- Caption = 'Change Display Fon&t...'
- OnClick = Changedisplayfont1Click
- end
- object Changedisplaycolours1: TMenuItem
- Caption = 'C&hange Display Colours...'
- OnClick = Changedisplaycolours1Click
- end
- end
- end
- end
-